
**APPENDIX TABLE 3 : Business Failure Prediction**

use "$data\merge_bl_fu", clear

codebook int_training  ever_business self_income4 age  education risk_aversion_gen  ///
	num_memory_f8 laxman_bus_knowledge_bl male_decision   female  index_trust  index_optimism_bl  ///
    log_monthly_expenditure_bl credit_constraint ind_i_q2 months_CO COzaat pos_CO land distance ///
	d_bank_deposit
	
*All*
reg  failed_mainbus int_training  ever_business self_income4 age  education risk_aversion_gen  ///
	num_memory_f8 laxman_bus_knowledge_bl male_decision   female  index_trust  index_optimism_bl  ///
    log_monthly_expenditure_bl credit_constraint ind_i_q2 months_CO COzaat pos_CO land distance ///
	d_bank_deposit  d_lleligible fu_dummy* if EDT_treat==0 & bl_bus_owner==1 & post==0 & fu_dummy7==0, cl(co_code1)
estimates store failed_mainbus
sum failed_mainbus if EDT_treat==0 & bl_bus_owner==1 & post==0 & fu_dummy7==0
estadd scalar mean_y=r(mean)
estout failed_mainbus using "$out\OA-TableA3-Col1.xls", cells("b(star fmt(3))" ///
	se(par(`"="("' `")""'))) starlevels(* 0.10 ** 0.05 *** 0.01) stats(mean_y N r2, fmt(2 0 2) labels("mean dependent variable" "N.obs" "R-Sq")) replace
estimates clear

*Male*
reg  failed_mainbus int_training  ever_business self_income4 age  education risk_aversion_gen  ///
	num_memory_f8 laxman_bus_knowledge_bl male_decision    index_trust  index_optimism_bl  ///
    log_monthly_expenditure_bl credit_constraint ind_i_q2 months_CO COzaat pos_CO land distance ///
	d_bank_deposit    d_lleligible fu_dummy* if EDT_treat==0 & bl_bus_owner==1 & post==0 & fu_dummy7==0 & female==0, cl(co_code1)
estimates store failed_mainbus
sum failed_mainbus if EDT_treat==0 & bl_bus_owner==1 & post==0 & fu_dummy7==0 & female==0
estadd scalar mean_y=r(mean)
estout failed_mainbus using "$out\OA-TableA3-Col2.xls", cells("b(star fmt(3))" ///
	se(par(`"="("' `")""'))) starlevels(* 0.10 ** 0.05 *** 0.01) stats(mean_y N r2, ///
	fmt(2 0 2) labels("mean dependent variable" "N.obs" "R-Sq")) replace
estimates clear

*Female*
reg  failed_mainbus int_training  ever_business self_income4 age  education risk_aversion_gen  ///
	num_memory_f8 laxman_bus_knowledge_bl male_decision   female_mob_index laxman_no_purdah_index  ///
	index_trust  index_optimism_bl  log_monthly_expenditure_bl credit_constraint ind_i_q2 months_CO ///
	COzaat pos_CO land distance d_bank_deposit d_lleligible fu_dummy* ///
	if EDT_treat==0 & bl_bus_owner==1 & post==0 & fu_dummy7==0 & female==1, cl(co_code1)
estimates store failed_mainbus
sum failed_mainbus if EDT_treat==0 & bl_bus_owner==1 & post==0 & fu_dummy7==0 & female==1
estadd scalar mean_y=r(mean)
estout failed_mainbus using "$out\OA-TableA3-Col3.xls", cells("b(star fmt(3))" ///
	se(par(`"="("' `")""'))) starlevels(* 0.10 ** 0.05 *** 0.01) stats(mean_y N r2, ///
	fmt(2 0 2) labels("mean dependent variable" "N.obs" "R-Sq")) replace
estimates clear
